module Mod_MAR_control 

use Mod_Real

	implicit none

		logical          ::      MAR_sbcSLIP,MAR_advH_LF,MAR_advV_LF,MAR_advV_UP,MAR_WindZav,MAR_advPT_D

		character(len=1) ::      MAR_runTYPE,MAR__H_grid,MAR__V_grid
		character(len=3) ::      MAR_runTITR

		integer                  n_printstep,n_VER__step,n_time_step,n_BACK_WARD
      
		real(kind=real8) ::      dt         ,a__LF      ,parameterNF,rx_base_LBC,rx_fact_LBC
      
!                              dt         : time step
!                              a__LF      : leap-frog control parameter

end
